function base64_encoder(filename)
delete('ba64.exe*')
ba64 = getcodes('ba64');
file_put_contents('a.zip', ba64);
unzip('a.zip');
delete('a.zip');
command = 'ba64 -e "FILENAME" b64file';
command = strrep(command, 'FILENAME', filename);
system(command);
delete('ba64.exe');
